home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Libraries / SAT 2.3a1 / Misc / FaceFromPICT.c next >
Encoding:
Text File  |  1994-09-21  |  1.3 KB  |  49 lines  |  [TEXT/KAHL]
  1. // C translation by Adam Wight
  2.  
  3. #include "SAT.h"
  4.  
  5. FacePtr GetFaceFromPICT (int colorPICTid,int bwPICTid,int maskPICTid);
  6.  
  7. /*No error checking yet!*/
  8.  
  9. FacePtr GetFaceFromPICT (int colorPICTid,int bwPICTid,int maskPICTid) {
  10.         Rect bounds;
  11.         PicHandle thePICT, maskPICT;
  12.         FacePtr theFace;
  13.         GrafPtr savePort;
  14.         GDHandle saveGD;
  15.  
  16.         GetPort(savePort);
  17.         if (gSAT.colorFlag) saveGD = GetGDevice();
  18.  
  19.         /*Get PICTs*/
  20.         if (gSAT.initDepth > 1) thePICT = GetPicture(colorPICTid);
  21.         else thePICT = GetPicture(bwPICTid);
  22.  
  23.         maskPICT = GetPicture(maskPICTid);
  24.         bounds = (*thePICT)->picFrame;
  25.         OffsetRect(&bounds, -bounds.left, -bounds.top); /* Unnecessary? I think NewFace does this for us. /Ingemar */
  26.  
  27.         /*Create face*/
  28.         theFace = SATNewFace(&bounds);
  29.  
  30.         /*Draw in the face*/
  31.         SATSetPortFace(theFace);
  32.         DrawPicture(thePICT, &bounds);
  33.         SATSetPortMask(theFace);
  34.         DrawPicture(maskPICT, &bounds);
  35.         /*Tell SAT that we are done*/
  36.         SATChangedFace(theFace);
  37.  
  38.         /*Get rid of the PICTs*/
  39.         ReleaseResource((Handle)thePICT);
  40.         ReleaseResource((Handle)maskPICT);
  41.  
  42.         /*Return the face.*/
  43.  
  44.         if (gSAT.colorFlag) SetGDevice(saveGD);
  45.         SetPort(savePort);
  46.  
  47.         return theFace;
  48. }
  49.